libxl: ocaml: use int64 for timeval fields in the timeout_register callback
authorRob Hoes <rob.hoes@citrix.com>
Thu, 12 Dec 2013 16:36:50 +0000 (16:36 +0000)
committerIan Campbell <ian.campbell@citrix.com>
Wed, 8 Jan 2014 14:11:17 +0000 (14:11 +0000)
commit56e43525ddc20aeda309ac19ac1104a1b171cb16
treec9de5c483c9ecee50939bddfd40421eb77f61b3b
parent44219e14e3e3514af7d1416041db034e98988868
libxl: ocaml: use int64 for timeval fields in the timeout_register callback

The original code works fine on 64-bit, but on 32-bit, the OCaml int (which is
1 bit smaller than the C int) is likely to overflow.

Signed-off-by: Rob Hoes <rob.hoes@citrix.com>
Acked-by: Ian Jackson <ian.jackson@eu.citrix.com>
Acked-by: Ian Campbell <ian.campbell@citrix.com>
tools/ocaml/libs/xl/xenlight.mli.in
tools/ocaml/libs/xl/xenlight_stubs.c